#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <windows.h>

#define High 20  // 游戏画面尺寸
#define Width 50

// 全局变量
int canvas[High][Width] = {0}; // 二维数组存储元素：-1为边框#，0为空格 ，1为蛇头@，大于1为蛇身*，-2为食物F
int moveDirection; // 小蛇移动方向，1,2,3,4分别表示上下左右
int Food_x,Food_y; // 记录食物位置
int Score; // 得分

void gotoxy(int x,int y)  //光标移动到(x,y)位置
{
    HANDLE handle = GetStdHandle(STD_OUTPUT_HANDLE);
    COORD pos;
    pos.X = x;
    pos.Y = y;
    SetConsoleCursorPosition(handle,pos);
}

void HideCursor()
{
	CONSOLE_CURSOR_INFO cursor_info = { 1, 0 }; // 第二个值为0表示隐藏光标
    SetConsoleCursorInfo(GetStdHandle(STD_OUTPUT_HANDLE), &cursor_info);
}

void startup() // 数据初始化
{
	int i,j;
	Score = 0;
	//边框
	for(i=0;i<High;i++)
	{
		canvas[i][0] = -1;
		canvas[i][Width-1] = -1;
	}
	for(j=0;j<Width;j++)
	{
		canvas[0][j] = -1;
		canvas[High-1][j] = -1;
	}
	//蛇
	canvas[High/2][Width/2] = 1;
	for(i=1;i<4;i++)
		canvas[High/2][Width/2-i] = i+1;

	moveDirection = 4; // 初始移动向右
	// 初始化食物的位置
	Food_x = rand()%(High-5)+2;
	Food_y = rand()%(Width-5)+2;
	canvas[Food_x][Food_y] = -2;

	HideCursor();
}

void moveSnakeByDirection()
{
	int i,j;
	int max = 0;
	int oldTail_i,oldTail_j; // 记录旧蛇尾位置
	int oldHead_i,oldHead_j; // 记录旧蛇头位置
	for(i=1;i<High-1;i++)
		for(j=1;j<Width-1;j++)
		{
			// 对所有大于0的元素加1
			if(canvas[i][j]>0)
			{
				canvas[i][j]++;
				// 求出最大值max所在位置
				if(max<canvas[i][j])
				{
					max = canvas[i][j];
					oldTail_i = i;
					oldTail_j = j;
				}
				// 记录旧蛇头位置
				if(canvas[i][j]==2)
				{
					oldHead_i = i;
					oldHead_j = j;
				}
			}
		}

	int newHead_i,newHead_j;
	

	if(moveDirection==1) // 向上
	{
		newHead_i = oldHead_i-1;
		newHead_j = oldHead_j;
	}
	if(moveDirection==2) // 向下
	{
		newHead_i = oldHead_i+1;
		newHead_j = oldHead_j;
	}
	if(moveDirection==3) // 向左
	{
		newHead_i = oldHead_i;
		newHead_j = oldHead_j-1;
	}
	if(moveDirection==4) // 向右
	{
		newHead_i = oldHead_i;
		newHead_j = oldHead_j+1;
	}

	// 判断小蛇蛇头是否碰到食物
	if (canvas[newHead_i][newHead_j]==-2)
	{
		// 食物原始位置归零
		canvas[Food_x][Food_y] = 0;
		// 产生新的食物
		Food_x = rand()%(High-5)+2;
		Food_y = rand()%(Width-5)+2;
		canvas[Food_x][Food_y] = -2;
		// 得分增加
		Score++;
	}	
	else
		canvas[oldTail_i][oldTail_j] = 0; // 没有吃到食物长度不变，最大值所在元素变为0

	// 判断蛇头撞到边框或自身，游戏结束
	if (canvas[newHead_i][newHead_j]>0 || canvas[newHead_i][newHead_j]==-1)
	{
		printf("Game Over!\n");
		system("pause");
		exit(0);
	}
	else
	{
		canvas[newHead_i][newHead_j] = 1;
	}
}

void show()  // 显示画面
{
	gotoxy(0,0);  // 光标移动到原点位置，以下重画清屏
	int i,j;
	for (i=0;i<High;i++)
	{
		for (j=0;j<Width;j++)
		{
			if (canvas[i][j]==-1)
				printf("#");   //   输出边框#
			else if (canvas[i][j]==0)
				printf(" ");   //   输出空格
			else if (canvas[i][j]==1)
				printf("@");   //   输出蛇头@
			else if (canvas[i][j]>1)
				printf("*");   //   输出蛇身*
			else if (canvas[i][j]==-2)
				printf("F");   //   输出食物F
		}
		printf("\n");
	}
	Sleep(100);
	printf("得分：%d\n",Score);
}	

void updateWithoutInput()  // 与用户输入无关的更新
{
	moveSnakeByDirection();
}

void updateWithInput()  // 与用户输入有关的更新
{
	char input;
	if(kbhit())  // 判断是否有输入
	{
		input = getch();  // 根据用户的不同输入来移动，不必输入回车
		if(input=='a' && moveDirection != 4) // 不能直接朝反方向移动
			moveDirection = 3;
		if(input=='d' && moveDirection != 3)
			moveDirection = 4;
		if(input=='w' && moveDirection != 2)
			moveDirection = 1;
		if(input=='s' && moveDirection != 1)
			moveDirection = 2;
		if(input==27)
			system("pause");
	}
}

int main()
{
	startup();  // 数据初始化
	system("color 3f");
	while (1)  // 游戏循环执行
	{
		show();  // 显示画面
		updateWithoutInput();  // 与用户输入无关的更新
		updateWithInput();  // 与用户输入有关的更新
	}
	return 0;
}